home *** CD-ROM | disk | FTP | other *** search
/ The Mac 13 / the-mac-13.iso / On The Rom / 100 Best Mac CD-ROMs Selection / UNZIP-DEMO / ZIPFILES / alt00 / 00023.ls < prev    next >
Encoding:
Text File  |  1995-05-25  |  394 b   |  21 lines
  1. on skulls
  2.   set k to 1
  3.   repeat while k < 3
  4.     set the castNum of sprite 13 to 41 + k
  5.     updateStage()
  6.     startTimer()
  7.     repeat while the timer < 6
  8.     end repeat
  9.     set k to k + 1
  10.   end repeat
  11.   set k to 1
  12.   repeat while k < 3
  13.     set the castNum of sprite 13 to 43 - k
  14.     updateStage()
  15.     startTimer()
  16.     repeat while the timer < 6
  17.     end repeat
  18.     set k to k + 1
  19.   end repeat
  20. end
  21.